home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 1 (Walnut Creek)
/
Aminet - June 1993 [Walnut Creek].iso
/
usenet
/
sources
/
volume90
/
util
/
fam_1_1
/
part01
/
time-it
< prev
Wrap
Text File
|
1990-02-16
|
981b
|
44 lines
delete prof#?.out
run lprof FAM FAM xyzzy FAMgrep .zoo.arc.lhz SYMCHOICE
waitforport FAM
waitforport FAM
waitforport FAM
date >t:start1
rx "say 'Scanning 1...';address 'FAM';'RESCAN';'EXPUNGE NOW';say 'DONE'"
date >t:end1
wait 10
rename prof.out prof1.out
wait 10
run lprof FAM FAM xyzzy FAMgrep .zoo.arc.lhz
waitforport FAM
waitforport FAM
waitforport FAM
date >t:start2
rx "say 'Scanning 2...';address 'FAM';'RESCAN';'EXPUNGE NOW';say 'DONE'"
date >t:end2
wait 10
rename prof.out prof2.out
wait 10
run lprof FAM FAM xyzzy FAMgrep
waitforport FAM
waitforport FAM
waitforport FAM
date >t:start3
rx "say 'Scanning 3...';address 'FAM';'RESCAN';'EXPUNGE NOW';say 'DONE'"
date >t:end3
wait 10
rename prof.out prof3.out
wait 10
echo "LStating..."
lstat >t:one -t=3 -f FAM prof1.out
lstat >t:two -t=3 -f FAM prof2.out
lstat >t:thr -t=3 -f FAM prof3.out
join t:start1 t:one t:end1 as ul:prof1
join t:start2 t:two t:end2 as ul:prof2
join t:start3 t:thr t:end3 as ul:prof3
echo "Done!"